home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr53 / 122_01.zip / LOGIC < prev    next >
Text File  |  1993-06-02  |  2KB  |  77 lines
  1. MENU FOR LOGIC RELATED OPERATORS:
  2. copyright (C) 1983 by E. E. Bergmann
  3. words described in alphabetical(ASCII) order.
  4. explanation of TFT NTT TOS
  5. :
  6. ::
  7. *********************************************************
  8. *                            *
  9. * PISTOL-Portably Implemented Stack Oriented Language    *
  10. *            Version 2.0            *
  11. * (C) 1983 by    Ernest E. Bergmann            *
  12. *        Physics, Building #16            *
  13. *        Lehigh Univerisity            *
  14. *        Bethlehem, Pa. 18015            *
  15. *                            *
  16. * Permission is hereby granted for all reproduction and *
  17. * distribution of this material provided this notice is *
  18. * included.                        *
  19. *                            *
  20. *********************************************************
  21. :
  22. ::
  23.  
  24. ..    TFT NTT TOS --> TRUE|FALSE, cyclic range check.
  25.     If NTT<=TOS the test is "TFT in [NTT..TOS]",
  26.     else the test is "(NTT<=TFT) OR (TFT<=TOS)".
  27.     {This definition is equivalent for both signed and
  28.      unsigned arithmetic! }
  29.  
  30. EQ    NTT TOS --> TRUE, if NTT is numerically equals TOS
  31.         --> FALSE, otherwise
  32.  
  33. EQZ    TOS --> TRUE, if TOS is zero
  34.         --> FALSE, otherwise
  35.  
  36. FALSE    --> 0
  37.  
  38. GE    NTT TOS --> (NTT>=TOS)
  39.  
  40. GT    NTT TOS --> (NTT>TOS)
  41.  
  42. GTZ    TOS --> (TOS>0)
  43.  
  44. LAND    NTT TOS --> (NTT<>0)AND(TOS<>0), "Logical AND"
  45.  
  46. LE    NTT TOS --> (NTT<=TOS)
  47.  
  48. LNOT    TOS --> (TOS==FALSE), "Logical NOT"
  49.  
  50. LOR    NTT TOS --> (NTT<>0)OR(TOS<>0), "Logical OR"
  51.  
  52. LT    NTT TOS --> (NTT<TOS)
  53.  
  54. LTZ    TOS --> (TOS<0)
  55.  
  56. OFF    TOS -->
  57.     Sets word pointed to by TOS to FALSE.
  58.  
  59. ON    TOS -->
  60.     Sets word pointed to by TOS to TRUE.
  61.  
  62. TRUE    --> -1, actually any nonzero value would be acceptable,
  63.     but -1 is represented by all 1's on many systems.
  64.  
  65. :
  66. ::
  67.  
  68.     TOS - "Top Of Stack"
  69.  
  70.     NTT - "Next To Top" of stack
  71.  
  72.     TFT - "Third From Top" of stack
  73.  
  74. :
  75. FT NTT TOS --> TRUE|FALSE, cyclic range check.
  76.     If NTT<=TOS the test is "TFT in [NTT..TOS]",
  77.     else the test